home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Programming / DiceSource / src / editors / AME / Rexx / rxbuf.ame < prev    next >
Encoding:
Text File  |  1994-02-01  |  241 b   |  14 lines
  1. /* $VER: RXBuf 37.1 (21.2.93) : rx a buffer */
  2.  
  3. options results
  4. 'getfilepath'
  5. oldname = result
  6. name = "T:" || address() || ".tmp"
  7.  
  8. saveas name
  9. args = ""
  10. parse arg args
  11. rx name args
  12.  
  13. address command 'delete >NIL: ' || name
  14. setfilepath oldname